home *** CD-ROM | disk | FTP | other *** search
- property pOldLocV
-
- on beginSprite
- pOldLocV = the mouseV
- end
-
- on enterFrame me
- if the stillDown then
- diff = pOldLocV - the mouseV
- member("InstructionsText").scrollTop = member("InstructionsText").scrollTop + diff
- pOldLocV = the mouseV
- else
- member("InstructionsText").scrollTop = member("InstructionsText").scrollTop + 1
- end if
- end
-
- on mouseDown
- pOldLocV = the mouseV
- end
-
- on exitFrame
- go(the frame)
- end
-